Top 10k strings from Millionaire (1984)(Incentive Software)[a].tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TZX] /
Back to the directory listing
12 z7;" ";
7 sale=sale-n1
7 n3,n0;" "
7 n1;" ";
6 z3;"LLLLL";
6 sale=sale-n2:
5 ass=ass-5000
4 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
3 z4;" ";
3 sale=sale-n5:
3 sale=sale+n8:
3 n4;" ";gph*gl
3 ass=ass-4000
3 ;tnc;" ";
3 *(year-1984
3 '"Computer software...............":
3 '"Computer Fair...................":
2 sale=sale-n2
2 sale=sale-n1:
2 sale=sale-4
2 sale=sale-15
2 sale=sale+n4:
2 sale=sale+n3:
2 sale=sale+n2
2 sale=sale+n10:
2 sale=sale+n1
2 n9,n10;"a give-away at...";
2 n6,n10;"A real bargain to you";
2 n4;"Do you want to pay your debts.":
2 n3;"Do you want to borrow `1000? ":
2 n2;''"Amount owing..............`";int2+bor2
2 n2,n0;" =9;!~0Vv|$ ";
2 int2=int+int2
2 int2=((bor2/n10)+int2)
2 bor2=bor+bor2
2 bor2-ass>5000
2 ass=ass-750
2 ass=ass-10000
2 ass=ass-(int2+bor2):
2 ;" LlOoAaNnSs ";
2 ,n10;"say, Guv?"
2 ''"You are allowed to borrow `1000 only each month.":
2 '"You will pay back `1000 plus an interest rate of 10% per month.":
2 '"You can only go into debt a certain amount, depending on your assets."
2 "SORRY...No more borrowing.":
2 " no cost"
2 "
1 ~Fn,,,,-,,,nF~
1 z=sale*(n1+
1 z8,z0;" ";
1 z7;" SOFTWARE INC. ";
1 z7;" ";
1 z7;" ";
1 z7;" "
1 z7;"
1 z7;"
1 z7,z7;"..>";
1 z5;" ";
1 z5;" ";
1 z5,z7;"..>";
1 z3;"LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL";
1 z2;"LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL";
1 z2,z9;"16 The Avenue":
1 z2,z5;"Executive Buildings"
1 z2,z4;"The Old Manor House";
1 z2,z10;"24, Broad St"
1 z1,z9;"SOFTWARE INC.";
1 z1,z8;"SOFTWARE INC.";
1 z1,z7;"SOFTWARE INC.";
1 z1,z10;"SOFTWARE INC";
1 z0;" ";
1 z(a-n8)>(gph*lg)
1 year=year+n1
1 v=sale*(n5+
1 spec=spec-
1 scor=(SCOR
1 sale=sale-n8
1 sale=sale-n7:
1 sale=sale-n5
1 sale=sale-n3:
1 sale=sale-n10:
1 sale=sale-n10
1 sale=sale+n9:
1 sale=sale+n7:
1 sale=sale+n5:
1 sale=sale+n1:
1 sale=sale+n10
1 sale=sale+14
1 sale=sale+12
1 sale=(sale
1 qJj=9=9Jj;!Vv~0Jj<#_4 ";
1 qJj=9=9Jj;!Vv~0Jj<#_4 ":
1 prps=pr+ps+oi+mi:
1 p
1 ou and these will directly influence whether or not you make it to the top and become a MILLIONAIRE"
1 n9;n$;" BbAaNnKkRrUuPpTt ";" *$~0Vv+8<#]&`@>% ";n$:
1 n9,n9;" ";
1 n9,n10;"it's all good stuff";
1 n9,n10;"be gettin some";
1 n8,n7;"A Management Game.":
1 n8,n10;"you might like";
1 n8,n10;"good quality (*****)";
1 n8,n10;"but I hope to";
1 n8,n10;"brand new,good quality";
1 n8,n10;" ";
1 n8,n0;"1.Free Booklet....cost=`3000"
1 n7;''" DO YOU WISH TO SELL? ":
1 n7;"OFFERS":
1 n7;"ENTER to continue"
1 n7;" ";
1 n7,n10;"got these 5 programs";
1 n7,n10;"Nothin today";
1 n7,n10;"Guv,two programs ";
1 n7,n10;"Guv,5000 cassettes, ";
1 n6;'"c...Original Ideas. ":
1 n6;'"b...Good Presentation. ":
1 n6;"A chance to reconsider..........":
1 n6,n10;"Sorry, Guv";
1 n6,n10;"Listen, Guv, I've";
1 n5;'" TIME TAKEN TO REACH `1000000 ":
1 n5;"by John Hunt
1 n5;" ";f$:
1 n4;gph*gl:
1 n4;'"TOTAL ASSETS.............`";ass:
1 n4;'"RATES,PHONE etc..........`";ex:
1 n4;'"DUPLICATING":
1 n4;'"AMOUNT BORROWED..........`";bor2+int2
1 n4;'"ADVERTISING"
1 n4;"JFMAMJJASOND"
1 n4;"HOW MANY COPIES?":
1 n4;" ";gph
1 n3;'" `250000......";moye-n3;" months"
1 n3;"LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL";
1 n3;" ";f$:
1 n3,n4;" ":
1 n2;"YEAR";
1 n2;"Please Wait"
1 n2;"ENTER to continue":
1 n2;"1:";month;":";y$
1 n2;" NOT ENOUGH CASSETTES PRODUCED."
1 n2;" `500000......";
1 n2,n0;" `@<#;!}6<#_4|$|$ ?2^7~0<#>% ";
1 n2,n0;" |$;!{5>%:'~0<#_4 JjVv?2. ";
1 n2,n0;" ^7;!Vv_4|$>% ^7~0<#<#[) ";
1 n2,n0;" Qq~0<#+8_4>%JjVv}6 ";
1 n2,n0;" |$?2;!<#_4 ";
1 n2,n0;" Jj-3_4~0|$ ";
1 n2,n0;" Vv_4:'|$ ";
1 n2,n0;" :';!<#+8 ";
1 n1;"A Million in ";
1 n1;" MmIiLlLlIiOoNnAaIiRrEe ":
1 n1;" `1000000.....";
1 n1;" ";
1 n1;" ":
1 n1;" "
1 n10,n9;" ";
1 n10,n10;"thing soon"
1 n10,n10;"all ***";
1 n10,n10;"`750. What do you";
1 n10,n10;"`350. What do you";
1 n10,n0;"2.Articles in papers,mags. etc.":
1 n1,n4;" MmIiLlLlIiOoNnAaIiRrEe ";
1 n1,n3,n7,n0,30
1 n1,n0;" PpRrOoGgRrEeSsSs CcHhAaRrTt ";
1 n1,n0;" SsOoFfTtWwAaRrEe IiNnCc ";
1 n1,n0;" MmAaRrKkEeTtIiNnGg ";
1 n1,n0;" SsCcOoRrEe ";
1 n1,n0;" IiDdEeAaSs ";
1 n1,n0;" WwOoRrKk ";
1 n1,n0;" NnEeWwSs ";
1 n0;"9 ";
1 n0;"8 1";
1 n0;"7 2";
1 n0;"6 3";
1 n0;" HhOoNnEeSsTt HhAaRrRrYy ";
1 n0,n0;"Y/N..."
1 n0,n0,n0,255
1 n0'"1...INCENTIVE SOFTWARE.....";v:
1 n$=" ":
1 moye=month+(12
1 month=month+n1:
1 mill=mill+n1:
1 ink1=n10-ink1
1 fff);" months":
1 fff);" months"
1 f$="ENTER to continue":
1 dup2=dup2-ms:
1 dup2=dup2+5000
1 dup2=dup+dup2
1 companies have started up and there is intense competition forsales.":
1 c=sale*(n3+
1 b+n1,a+n1;
1 ass=ass-tax
1 ass=ass-ex
1 ass=ass-6500
1 ass=ass-50000
1 ass=ass-500
1 ass=ass-39000
1 ass=ass-350
1 ass=ass-3000
1 ass=ass-25000
1 ass=ass-2500
1 ass=ass-250
1 ass=ass-20000
1 ass=ass-2000
1 ass=ass-16500
1 ass=ass-12000
1 ass=ass-1000
1 ass=ass-100
1 ass=ass+1000
1 ass<100000
1 a;"SORRY.......BUT YOU'RE BANKRUPT.":
1 a;"SORRY.......BUT YOU'RE BANKRUPT."''
1 Variable not foun
1 Tape loading erro
1 Subscript wron
1 Statement los
1 Start tape, then press any key
1 STOP statemen
1 STOP in INPU
1 SALE>N0))+(20
1 RETURN without GOSU
1 RAMTOP no goo
1 Parameter erro
1 Out of scree
1 Out of memor
1 Out of DAT
1 Number too bi
1 Number array:
1 Nonsense in BASI
1 No room for lin
1 NEXT without FO
1 N4;" ENTER to continue ":
1 MILLION
1 Invalid strea
1 Invalid file nam
1 Invalid colou
1 Invalid argumen
1 Invalid I/O devic
1 Integer out of rang
1 INTRODUCTION
1 FOR without NEX
1 FN without DE
1 F8*E\"B\:G\
1 End of fil
1 Created with Ramsoft MakeTZX
1 Character array:
1 BbAaNnKkRrUuPpTt *$~0Vv+8<#]&`@>%
1 BREAK into progra
1 BREAK - CONT repeat
1 BHY65TGVNJU74RFCMKI83EDX
1 @o,/ /,,,,nF~
1 ?,,,,,,,<,,,,,88888888888888888888888888888888,,<,,,,,,,<,,,,,,,<,,,,,,,<,,,,,
1 >osperous business. Its only a matter of time now before you reach your million."
1 ;tnc;" ":
1 ;'"d...Should maintain interest."
1 ;'"a...Well written program. "
1 ;'"Each of these ideas may be used once only to try to boost sales."'
1 ;'"1...100 2...250 3...500":
1 ;'"0...No duplicating required.....":
1 ;"d....";:
1 ;"c....";:
1 ;"b....";:
1 ;"a....";:
1 ;"WHAT MAKES A GOOD PROGRAM?":
1 ;"SELECT OPTION 1 TO 6":
1 ;"SELECT OPTION 0 TO 5":
1 ;"NOW LOADING";
1 ;"LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL"
1 ;"Do you wish to specialize in onetype of program?":
1 ;"4..`1.50"
1 ;"4...1000 5...2500 6...5000"
1 ;"1...50p 2...75p 3...`1.00":
1 ;" Select Option 1 to 6":
1 ;" Select Option 0 to 4":
1 ;" Choose number or Press Enter to continue "
1 ;" ";
1 ;" ";
1 ;" "
1 0p````````p0
1 ,z0;" "
1 ,z0;"
1 ,n8;"ENTER to continue":
1 ,n8,n8,n0,n0
1 ,n6;"Select Option 0 to 7":
1 ,n6;"HOLD THE LINE PLEASE"
1 ,n6;" "
1 ,n10;"`750 for the lot?"
1 ,n10;"How about say";
1 ,n0;"YOU HAVE ALLOCATED "+("MORE"
1 ,n0;"LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL";
1 ,n0;"5.Pay for TV advert..cost=`5000"
1 ,n0;"4.Push programs for reviews":
1 ,n0;"3.Short, second program on each ":
1 ,n0,n3,n3,n3,n0,n3,n3,n3,n0,170
1 ,n0,n0,126
1 +"W\#"S\"K\6
1 *n10))*n4:
1 *n10))*n3:
1 *n10))*4.5
1 *n10))*3.5
1 *Y\####"[\
1 )TSR7PO_^]\[ZTS
1 );" months"
1 )+" THAN 20":
1 ));" month"+("s"
1 (sale*spec*st)
1 (sale*(n4+
1 (sale*(n2+
1 (ass/250000
1 (ass-((dup*dp)/100
1 ((spec/100
1 ((bor2+int2)-ass)>10000
1 ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((*********:::::::::(((((((((((((**********888888888(((((((((((((8888888(((888888888((((((((((***8888888(((888888888((((((((((8888888888(((888888888888888((((8888888888(((8888888 88888 8((((8888888888(((8888888 88888 8((,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,<,,,,,,,<,,,,,,,<,,,,,,,<,,,,,88888888888888888888888888888888,,<
1 '''"You can market the program yourself or else sell it to an existing software house to get some more capital.":
1 '''"Do you wish to sell?"
1 '''" SELECT OPTION 1 TO 9"
1 ''"These are for outright sales.":
1 ''"ENTER 0 IF NONE ARE ACCEPTABLE"
1 ''" SCORE (0-100)......";
1 '"Your company is to host a large computer fair. Total cost `20000":
1 '"Your company has received great public praise.":
1 '"You own a home computer and havewritten a program which you "
1 '"You have done well in building up such a pr=n1:
1 '"You have 20 points to allocate to your program. A good programwill consist of all of the following items but you must decide which sections deserve the most points.":
1 '"The decisions are up to y<b`
1 '"Terrible weather has brought thecountry to a standstill. Slump in sales of software.":
1 '"TOTAL SALES...............";ts:
1 '"THE GOOD TIMES ARE OVER.... Over the past year a lot of new
1 '"TAPES STILL IN STOCK......";dup2-ms:
1 '"Software Ltd involved in court case, concerning stolen goods. Apart from paying the fine and costs this could do the company great harm.":
1 '"Small, unimpressive magazine article.":
1 '"STAFF PROBLEMS.......":
1 '"SOMEBODY DOESN'T LIKE YOU.......":
1 '"SALES THIS MONTH..........";ms:
1 '"Repair work....`6500":
1 '"RECORD ATTENDANCE.":
1 '"Part time staff required for a few weeks. Total cost `4000":
1 '"PROGRAMS ON THE MARKET....";st:
1 '"POOR CHRISTMAS SALES.":
1 '"POOR ATTENDANCE.":
1 '"Office furniture. Cost `2000":
1 '"New policy to streamline the company. Slower selling tapes to be taken off the market.":
1 '"New equipment required. Total cost `12000":
1 '"New computers needed. Cost `5000":
1 '"Nasty rumours appear in daily papers and mags about your past. You are unable to trace the source. They eventually stop butnot without affecting your sales":
1 '"Monthly rate increase of `250.":
1 '"Major repair work. Cost `4000.":
1 '"In order to compete efficiently in this growing market, you havehad to cut the price of all yourprograms. This will of course reduce the profit margin.":
1 '"INLAND REVENUE INVESTIGATE......":
1 '"Extra tax owed....`";tax:
1 '"Decide on which area you are going to work this month."
1 '"Copyright problems. Total costs of `5000.":
1 '"Copyright problems and also being in possession of stolen software. Total costs of `50000.":
1 '"Choose how much to spend on youradvertising this month..........":
1 '"Choose how many copies you need for this month.":
1 '"Cassette voted best program of the year.":
1 '"Big mistake....":
1 '"Big Trouble....":
1 '"BUMPER CHRISTMAS SALES.":
1 '"Alterations and repairs to the office. Total cost `16500.":
1 '"AVERAGE CHRISTMAS SALES.":
1 '"AVERAGE ATTENDANCE.":
1 '"6...Sell out"
1 '"5...Try to obtain loan":
1 '"5...SOFTLY SOFT CO.........";a:
1 '"4...PEALCY PLC.............";b:
1 '"4...Convert existing programs to other machines."
1 '"3...ZAP'EM OF CLAPHAM......";z:
1 '"3...Try to sell your products to retailers.":
1 '"2...See Honest Harry":
1 '"2...COMPUTERS & CHIPS......";c:
1 '"1...Programming":
1 '"0...`0 1...`100 2...`250":
1 '" Magazine coverage cancelled.":
1 '" 9...Other":
1 '" 8...Wargame":
1 '" 7...Utility Program":
1 '" 6...Management Game":
1 '" 5...Education":
1 '" 4...Business/serious Program":
1 '" 3...Board Game":
1 '" 2...Adventure Game":
1 '" 1...Arcade Game":
1 '" Total Assets.......`";ass:
1 '" Time in business...";month+(12
1 '" Selling Price......`";ass-n1-
1 '" Popularity rating..";sale*5
1 '" Good Magazine Coverage.":
1 '" Can you do better? "
1 '" GOOD LUCK!!":
1 #"a\*a\"c\*c\"e\
1 #"a\"c\"e\>82
1 "consider to be of sufficient quality to market. You are willing to put `500 of your own money into the project."
1 "You can pay the following amountper cassette for duplicating (plus the cassette).............":
1 "Technical manager has run off with `25000.":
1 "Program released with lots of 'bugs'. Bad reports in the press,plus lots of customers to satisfy. The person concerned has been sacked.":
1 "Major tax enquiry. The books don't balance. Ends in court case. No clear verdict. Tax to be paid `34000. Court costs to be paid `5000.":
1 "Already some companies have gonebankrupt. From now on selling is going to get gradually more and more difficult.":
1 "All sections must receive from 1 to 8 points.":
1 "6...`5000 7...`10000"
1 "3...`500 4...`1000 5...`2500":
1 " tape...cost=`4000"
1 " ** TRY AGAIN **":
1 1982 Sinclair Research Lt
1 ";
1 ";
1 ";
1 enter no between ln & hn